home *** CD-ROM | disk | FTP | other *** search
/ Softdisk for Windows 42 / Softdisk for Windows 42.iso / QUARRY / QUARRY.EXE / QUARRY.dxr / 00178_GAME LENGTH.ls < prev    next >
Encoding:
Text File  |  1998-01-01  |  413 b   |  20 lines
  1. on mouseUp
  2.   global UPG, SOND, BLUESCORE, REDSCORE
  3.   if SOND = 0 then
  4.     puppetSound("SCLICK")
  5.   end if
  6.   if UPG = 0 then
  7.     go("NOL")
  8.   end if
  9.   if (UPG = 1) and ((BLUESCORE + REDSCORE) = 0) then
  10.     go("LENGTH")
  11.   end if
  12.   if (UPG = 1) and ((BLUESCORE + REDSCORE) <> 0) then
  13.     puppetSound(0)
  14.     puppetSound("BOING")
  15.   end if
  16.   if (UPG = 1) and ((BLUESCORE + REDSCORE) <> 0) then
  17.     go("GST")
  18.   end if
  19. end
  20.